The online racing simulator
Searching in All forums
(363 results)
Napalm Candy
S3 licensed
I think "sporty pink" it is not pink, is violet
Napalm Candy
S3 licensed
2 things.

First, I want to say that it is a trhead to disscus possible problems with new patch, not to discuss if ABS is well or not.

Second, I never understand problems with Add-ons, FZ5 from the begining had Traction Control, you can use or not, I think that the majority don't use in Hotlap or Race becouse it is slower. Make the same with ABS if you like use, if you don't like don't use
Napalm Candy
S3 licensed
Yesterday i had 2 crashes but I don't thinked to take a screenshot, but was a problem with dx8... Was when I'm in Training mode with RAC in Aston.
Napalm Candy
S3 licensed
Quote from kaynd :It does work. It's the first thing I did try. Use the force view to see... you just do not hear it as much as when locking the front tires.

(I haven't tested backwards braking though )

Ouch... was a mistake. I have tested with an old Set, and of course not have ABS activated.... sorry Works fine!
Napalm Candy
S3 licensed
Scawen what exact changes has FBM wheels?

I had testing with defaul set in City Long and i noticed that with red tyres you can run without "drift" I feel easy to drive. I noticed too that if you slid to much tires don't burn up having a stable temperature. Any change in tires?
Napalm Candy
S3 licensed
Quote from Android XP :
It works perfectly fine, what are you talking about?

E: In case you don't know, if you put the brake bias back the rear brakes will have more strength and the front brakes will have less.

Yes, i know what is brake bias. What I want to say is, if rear wheels blocks with brake, but no front wheels, then ABS does not work. I don't know if it is the normal function of ABS... so I say "possible fail on ABS"
Napalm Candy
S3 licensed
I'm testing ABS on XRT and I found a possible fail.

If I put brake bias at 50%, when I brake at maxium ABS does not work

Suggeriment, can you put new flag on OutGauge for ABS and EPS (if scirocco has), thanks.
Napalm Candy
S3 licensed
In our league now have a Championship with Lx4 vs XRT vs FXO vs RB4. 1 race per week. We have complete 4 races and remain 3 more. This monday is the next at Kyoto Long

http://www.liveforspeed.es/mod ... amp;file=consulta_carrera

This is the inscription web page, you need a hotlap in lfsworld an a lap in online, and aprovemente of register of our administrators
Napalm Candy
S3 licensed
Real car and no cost 15$!!!
Napalm Candy
S3 licensed
I have do in another way. Is better if I move a line than draw new lines I have working my first gauge!
Napalm Candy
S3 licensed
Yes, now redraw the line, but not delete older and result this...
http://img522.imageshack.us/img522/959/84851625ah0.jpg
Napalm Candy
S3 licensed
Hi, I have tried AndroidXP method and runs, only with a little modification.

Changing this

point2Y = sin(angle) * radius
point2X = cos(angle) * radius

for
point2Y = (sin(angle) * radius) + point1y
point2X = (cos(angle) * radius) + point1x

To make a circle. And line is
Me.Line (Point1x, Point1y)-(Point2x, Point2y)

Now the problem is that the line only draw one time, and I change value of variable angle no redraw the line.... How I can to erase older line and redraw new line every X seconds?
Napalm Candy
S3 licensed
I would also see the average cost of fuel per minute, but I don't know how to link with a variable time, because I do not know time functions. Any idea?
Napalm Candy
S3 licensed
Neither works fullbeam, I have asigned another picture. And OG_BAR and OG_KM what is they function?
Napalm Candy
S3 licensed
Two questions, what is mean "FullBeam"? I don't know what is this signal. And what is the utility for OG_KM and OG_BAR?

And second question, I cant to work with OG_HEADLIGHTS, don't want to run. But VB6 don't say any error, simply no appear the image.

'Traction Control
Dim TractionControl As Byte
Select Case Packet.Flags And OG_TC
Case 16
TractionControl = True
Case 0
TractionControl = False
End Select
picTC.Visible = TractionControl

'Headlights
Dim HeadLights As Byte
Select Case Packet.Flags And OG_HEADLIGHTS
Case 32
HeadLights = True
Case 0
HeadLights = False
End Select
PicHEADLIGHTS.Visible = HeadLights

First example of TC works fine, and with all other signals, but with Headlights no... what i'm doing wrong?
Last edited by Napalm Candy, .
Napalm Candy
S3 licensed
Thanks for answers.

First i will try burnsy1882's dll but, how I can to "pop into my program"? I don't know how to use it...
Napalm Candy
S3 licensed
I say rotate an image, becouse is the only way that I thinked. If is easy drawing a needle ok, but.. how will rotate later? I don't want to complicate so much the program.

Be patient with me... I'm too new in programming and VB
Help with Visual Basic and OutGauge
Napalm Candy
S3 licensed
Hi, I'm trying to do a personalized outgauge program for my monitor (a PS1 screen hacked to VGA). I have a big part of work made.

Now want to rotate a picture (needle) in a gauge but I don't know how I can do, how would be the code?
Napalm Candy
S3 licensed
Thank you man, now works fine

Only I see a little problem, I can't put Integer for OG_BAR, but becouse I don't know the utility of this flag, I think that I don't use
Private Const OG_BAR As Long = 32768
Napalm Candy
S3 licensed
Option Explicit

'This can be controlled by 5 lines in the cfg.txt file :
'OutGauge Mode 0 :0-off 1-driving 2-driving+replay
'OutGauge Delay 1 :minimum delay between packets (100ths of a sec)
'OutGauge IP 0.0.0.0 :IP address to send the UDP packet
'OutGauge Port 0 :IP port
'OutGauge ID 0 :if not zero, adds an identifier to the packet

'Each update sends the following UDP packet :
Private Type OutGaugePacket
Time(0 To 3) As Byte 'unsigned int Time; // time in milliseconds (to check order)
Car(0 To 3) As Byte 'char Car[4]; // Car name
Flags(0 To 1) As Byte 'word Flags; // Combination of OG_FLAGS, see below
Gear As Byte 'byte Gear; // Reverse:0, Neutral:1, First:2...
SpareB As Byte 'byte SpareB;
Speed As Single 'float Speed; // M/S
RPM As Single 'float RPM; // RPM
Turbo As Single 'float Turbo; // BAR
EngTemp As Single 'float EngTemp; // C
Fuel As Single 'float Fuel; // 0 to 1
OilPress As Single 'float OilPress; // BAR
Spare1 As Single 'float Spare1;
Spare2 As Single 'float Spare2;
Spare3 As Single 'float Spare3;
Throttle As Single 'float Throttle; // 0 to 1
Brake As Single 'float Brake; // 0 to 1
Clutch As Single 'float Clutch; // 0 to 1
Display1(0 To 15) As Byte 'char Display1[16]; // Usually Fuel
Display2(0 To 15) As Byte 'char Display2[16]; // Usually Settings
ID As Long 'int ID; // (optional ID - if specified in cfg.txt)
End Type

Private Const OG_SHIFTLIGHT As Long = 1 '#define OG_SHIFTLIGHT 1
Private Const OG_FULLBEAM As Long = 2 '#define OG_FULLBEAM 2
Private Const OG_HANDBRAKE As Long = 4 '#define OG_HANDBRAKE 4
Private Const OG_PITSPEED As Long = 8 '#define OG_PITSPEED 8
Private Const OG_TC As Long = 16 '#define OG_TC 16
Private Const OG_HEADLIGHTS As Long = 32 '#define OG_HEADLIGHTS 32
Private Const OG_SIGNAL_L As Long = 64 '#define OG_SIGNAL_L 64
Private Const OG_SIGNAL_R As Long = 128 '#define OG_SIGNAL_R 128
Private Const OG_REDLINE As Long = 256 '#define OG_REDLINE 256
Private Const OG_OILWARN As Long = 512 '#define OG_OILWARN 512
Private Const OG_1 As Long = 1024 '#define OG_1 1024
Private Const OG_2 As Long = 2048 '#define OG_2 2048
Private Const OG_3 As Long = 4096 '#define OG_3 4096
Private Const OG_4 As Long = 8192 '#define OG_4 8192
Private Const OG_KM As Long = 16384 '#define OG_KM 16384
Private Const OG_BAR As Long = 32768 '#define OG_BAR 32768

Private lngTheSocket As Long

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (pDst As Any, pSrc As Any, ByVal ByteLen As Long)

Private Sub Form_Load()
If theSocket.Initilize("MrOutGauge") Then
lngTheSocket = theSocket.ListenTo("UDP", 55)

Print "Listening on port 55"
Else
Print "Could not initlize winsock!?"
End If
End Sub


Private Sub theSocket_Received(lngSocket As Long, Data() As Byte)
If lngSocket = lngTheSocket Then
Dim Packet As OutGaugePacket
Dim Display1 As String
Dim Display2 As String

CopyMemory Packet, Data(0), LenB(Packet)

lblSpeed.Caption = Format(Packet.Speed * 3.6, "##0.0") 'Valor de velocidad
lblFuel.Caption = Format(Packet.Fuel * 100, "#0.#0") & " %" 'Valor de Fuel en %
lblRPM.Caption = Format(Packet.RPM, "####0") 'Valor de RPM
lblTurbo.Caption = Format(Packet.Turbo, "#0.##0") & " BAR" 'Indicador de Turbo

Display1 = Chr(Packet.Display1(0))
Display1 = Display1 & Chr(Packet.Display1(1))
Display1 = Display1 & Chr(Packet.Display1(2))
Display1 = Display1 & Chr(Packet.Display1(3))
Display1 = Display1 & Chr(Packet.Display1(4))
Display1 = Display1 & Chr(Packet.Display1(5))
Display1 = Display1 & Chr(Packet.Display1(6))
Display1 = Display1 & Chr(Packet.Display1(7))
Display1 = Display1 & Chr(Packet.Display1(8))
Display1 = Display1 & Chr(Packet.Display1(9))
Display1 = Display1 & Chr(Packet.Display1(10))
Display1 = Display1 & Chr(Packet.Display1(11))
Display1 = Display1 & Chr(Packet.Display1(12))
Display1 = Display1 & Chr(Packet.Display1(13))
Display1 = Display1 & Chr(Packet.Display1(14))
Display1 = Display1 & Chr(Packet.Display1(15))
lblDisplay1.Caption = Display1 ' Muestra el Display 1

Display2 = Chr(Packet.Display2(0))
Display2 = Display2 & Chr(Packet.Display2(1))
Display2 = Display2 & Chr(Packet.Display2(2))
Display2 = Display2 & Chr(Packet.Display2(3))
Display2 = Display2 & Chr(Packet.Display2(4))
Display2 = Display2 & Chr(Packet.Display2(5))
Display2 = Display2 & Chr(Packet.Display2(6))
Display2 = Display2 & Chr(Packet.Display2(7))
Display2 = Display2 & Chr(Packet.Display2(8))
Display2 = Display2 & Chr(Packet.Display2(9))
Display2 = Display2 & Chr(Packet.Display2(10))
Display2 = Display2 & Chr(Packet.Display2(11))
Display2 = Display2 & Chr(Packet.Display2(12))
Display2 = Display2 & Chr(Packet.Display2(13))
Display2 = Display2 & Chr(Packet.Display2(14))
Display2 = Display2 & Chr(Packet.Display2(15))
lblDisplay2.Caption = Display2 'Muestra el display2

'Indicador de marcha
If Packet.Gear = 0 Then lblGear.Caption = Format("R")
If Packet.Gear = 1 Then lblGear.Caption = Format("N")
If Packet.Gear = 2 Then lblGear.Caption = 1
If Packet.Gear = 3 Then lblGear.Caption = 2
If Packet.Gear = 4 Then lblGear.Caption = 3
If Packet.Gear = 5 Then lblGear.Caption = 4
If Packet.Gear = 6 Then lblGear.Caption = 5
If Packet.Gear = 7 Then lblGear.Caption = 6
If Packet.Gear = 8 Then lblGear.Caption = 7
If Packet.Gear = 9 Then lblGear.Caption = 8

If (Packet.Flags And OG_SHIFTLIGHT) > 0 Then LEDShiftLigth.Visible = True

End If
End Sub

I use the example of Stuff in first page of this thread.

I have tried to change the lines..
Flags(0 To 1) As Byte

to


Flags(0 To 1) As Integer

...AND...

Private Const OG_SHIFTLIGHT As Long = 1

to


Private Const OG_SHIFTLIGHT As Integer = 1

And I have the same error message
Napalm Candy
S3 licensed
I'm trying but i can't to do I don't have sufficient skills in programming

If I put the line:

If (Packet.Flags And OG_SHIFTLIGHT) > 0 Then LEDShiftLigth.Visible = True

I have an error. "compile error: Type mismatch"

and VB6 underlines the word AND, if I put & I have the same error
Napalm Candy
S3 licensed
Hi, i'm new in VB6, but i'm making a simple program to recieve data from outgauge.

I see Speed, RPM, turbo.. etc. But I don't know how to use "flags". I want to make visible or invisilbe an image when shiftlight goes on. The code that I use is..

If OG_SHIFTLIGHT = 1 Then LEDShiftLigth.Visible = True
If OG_SHIFTLIGHT = 0 Then LEDShiftLigth.Visible = False

The problem is OG_Shiftlight is a constant not a variable and ever is 1. ¿How I can do?
Napalm Candy
S3 licensed
Quote from S14 DRIFT :No offense or anything, but if you need to learn a track using the "4" feature, then maybe you're playing the wrong kinda game.

Although there's an 'ideal' line, it's rather generic. Individual drivers have their own lines, that work for them and their driving style. Try to 'take' it from them, and you'll either end up crashing or being nowhere near as fast.

Try practising offline or with freinds, it'll be much better than following a WR line or using "4".

I don't know if you see races on TV, F1 or something, but in some tracks F1 in chicanes fly, 4 wheels on air, if I remember well is in Magny Course, French GP

I have a shifter kart with 50bhp and I see how people fly too in chicanes, it produce damage in chasis of kart, but if it is faster people do to win a race, this is the real races. You HAVE to go where you can to go faster and if you have to put 1 or 2 tires in grass to take better a corner you will do.

I don't need the "4" function, but I can use to learn raceline in less time, only if this raceline it is good, no like now.

And without compromise with damage car or risk, in some corners like last of AS4R the actual raceline is WRONG
Napalm Candy
S3 licensed
Quote from wsinda :If you try to follow a raceline that stems from a WR hotlap, then you won't survive the first turn... Unless you have alien-like driving skills, but then you don't need a raceline anyway.

I can't to do a good WR but in same cases I do better one or two specifics corners than a WR. My raceline is very similar to WRs, but if I see in the track I can learn in less time.

This week i'm training on LX4@AS4R and the last corner with "ideal raceline" is only in this corner, 1 or 2 secons slow.

Wherever if raceline will improve IA will improve their times. I run 8 seconds per lap faster in this combo than IA
Napalm Candy
S3 licensed
Quote from Inouva :Lol , new users , LFS is not "Modeable", And dev want that

At the moment is not "modeable", but dev wants when finish S3. Who no wants are some users.
FGED GREDG RDFGDR GSFDG